home *** CD-ROM | disk | FTP | other *** search
/ STraTOS 1997 April & May / STraTOS 1 - 1997 April & May.iso / CD01 / GRAPHICS / POV_3 / SCENES / POV3DEMO / OTHER / IFELSE1.POV < prev    next >
Encoding:
Text File  |  2004-06-07  |  922 b   |  48 lines
  1. // Persistence Of Vision raytracer version 3.0 sample file.
  2. // Illustrates conditional parsing.
  3. // Run with +k0 results blue sphere
  4. // Run with +k1 results blue box
  5. // Run with +k2 adds check floor under blue box
  6. // Run with +k3 changes blue box to red
  7.  
  8. #version 3.0
  9. global_settings { assumed_gamma 2.2 }
  10.  
  11. #include "colors.inc"
  12.  
  13. camera {
  14.   location <0, 3, -5>
  15.   direction <0, 0, 1.5>
  16.   right <1.3333, 0, 0>
  17.   look_at <0, 0 , 0>
  18. }
  19.  
  20. light_source { <10, 20, -30> colour White}
  21. light_source { <-5, 2, -3> colour White}
  22.  
  23.  
  24. #declare My_Texture =
  25.  texture {
  26.    #if (clock > 2.5)
  27.      pigment{Red}
  28.    #else
  29.      pigment{Blue}
  30.      finish{phong 1}
  31.    #end
  32.  }
  33.  
  34. #if (clock > 0.5)
  35.  box { <-1, -1, -1> <1, 1, 1> 
  36.    texture{My_Texture}    
  37.    rotate -y*45
  38.  }
  39. #else
  40.  sphere { <0,1,0>, 1 texture{My_Texture}}
  41. #end
  42.  
  43. #if (clock > 1.5)
  44.  plane { y,-1
  45.     pigment { checker Green,White }
  46.  }
  47. #end
  48.